<html>
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
    <title>TCL_UpVar</title>
  </head>
  <body bgcolor="#FFFFFF">
    <center>Scilab Function</center>
    <div align="right">Last update : 18/11/2005</div>
    <p>
      <b>TCL_UpVar</b> - Make a link from a tcl source variable
  to a tcl destination variable</p>
    <h3>
      <font color="blue">Calling Sequence</font>
    </h3>
    <dl>
      <dd>
        <tt>OK=TCL_UpVar(varname1,varname2,[interp])</tt>
      </dd>
    </dl>
    <h3>
      <font color="blue">Parameters</font>
    </h3>
    <ul>
      <li>
        <tt>
          <b>varname1</b>
        </tt>: character string. Contains the name of the tcl source
          variable.</li>
      <li>
        <tt>
          <b>varname2</b>
        </tt>: character string. Contains the name of the tcl destination
          variable.</li>
      <li>
        <tt>
          <b>interp</b>
        </tt>: optional character string parameter. Name of the slave tcl
          interpreter in which the operation has to be performed. If not
          provided, it defaults to the main tcl interpreter created by
          Scilab.</li>
      <li>
        <tt>
          <b>ok</b>
        </tt>: boolean. %T if it is ok.</li>
    </ul>
    <h3>
      <font color="blue">Description</font>
    </h3>
    <p>Make a link from a tcl source variable to a tcl destination
    variable.</p>
    <h3>
      <font color="blue">Examples</font>
    </h3>
    <pre>
TCL_SetVar("Scilab","OK")
TCL_UpVar("Scilab","ScilabBis")
TCL_GetVar("ScilabBis")
TCL_SetVar("Scilab","NOK")
TCL_GetVar("ScilabBis")
TCL_SetVar("ScilabBis","modified")
TCL_GetVar("ScilabBis")
TCL_GetVar("Scilab")

TCL_CreateSlave('InterpBis')
TCL_SetVar("Scilab","Good",'InterpBis')
TCL_UpVar("Scilab","ScilabBis",'InterpBis')
TCL_GetVar("ScilabBis",'InterpBis')
TCL_SetVar("Scilab","Not good",'InterpBis')
TCL_GetVar("ScilabBis",'InterpBis')
TCL_SetVar("ScilabBis","modified again",'InterpBis')
TCL_GetVar("ScilabBis",'InterpBis')
TCL_GetVar("Scilab",'InterpBis')
TCL_DeleteInterp('InterpBis')
 
  </pre>
    <h3>
      <font color="blue">See Also</font>
    </h3>
    <p>
      <a href="ScilabEval.htm">
        <tt>
          <b>ScilabEval</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TK_EvalFile.htm">
        <tt>
          <b>TCL_EvalFile</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TK_EvalStr.htm">
        <tt>
          <b>TCL_EvalStr</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TCL_GetVar.htm">
        <tt>
          <b>TCL_GetVar</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TCL_SetVar.htm">
        <tt>
          <b>TCL_SetVar</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TCL_ExistVar.htm">
        <tt>
          <b>TCL_ExistVar</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TCL_UnsetVar.htm">
        <tt>
          <b>TCL_UnsetVar</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TCL_CreateSlave.htm">
        <tt>
          <b>TCL_CreateSlave</b>
        </tt>
      </a>,&nbsp;&nbsp;<a href="TCL_DeleteInterp.htm">
        <tt>
          <b>TCL_DeleteInterp</b>
        </tt>
      </a>,&nbsp;&nbsp;</p>
    <h3>
      <font color="blue">Author</font>
    </h3>
    <p>Allan CORNET</p>
  </body>
</html>
